home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / ws_enc1a / math.bas < prev    next >
BASIC Source File  |  1999-10-09  |  262b  |  13 lines
  1. Attribute VB_Name = "modMath"
  2. Public Function C_HexInt(sHex As String) As Integer
  3. 'This function converts Hex strings into Decimal
  4. For I = 0 To 255
  5.     If Hex(I) = sHex Then
  6.         C_HexInt = I
  7.         Exit Function
  8.     End If
  9. Next I
  10.  
  11. End Function
  12.  
  13.